home *** CD-ROM | disk | FTP | other *** search
/ PC User 2004 November / PCU1104CD2.iso / software / browsers / files / QBrows.exe / {app} / Scripts / Remove all Links.js < prev    next >
Encoding:
Text File  |  2003-10-05  |  1.1 KB  |  58 lines
  1. Console.Clear();
  2.  
  3. var doc = Document.HtmlDocument;
  4.  
  5. KillLinks( doc.parentWindow.top );
  6.  
  7. function KillLinks( window )
  8. {
  9.     var document = window.document;
  10.     var frames = window.frames;
  11.     var forms = document.forms;
  12.     var links = document.links;
  13.     
  14.     Console.WriteLine( document.title + ": " + 
  15.         frames.length + " frames, " + 
  16.         links.length + " links, " + 
  17.         forms.length + " forms" );
  18.     
  19.     var count = links.length;
  20.     for( var i=count-1; i>=0; i-- )
  21.     {
  22.         var a = links[i];
  23.         if(a.tagName == "A")
  24.             a.outerHTML = "<U>" + a.innerHTML  +"</U>";
  25.         else if(a.tagName == "AREA")
  26.             a.outerHTML = "";
  27.     }
  28.  
  29.     count = links.length;
  30.     for( var i=count-1; i>=0; i-- )
  31.     {
  32.         var form = forms[i];
  33.         delete form.action;
  34.     }
  35.     
  36.     count = frames.length;
  37.     for( var i=0; i<count; i++ )
  38.     {
  39.         var frame = frames[i];
  40.         if( frame != null )
  41.         {
  42.             Console.WriteLine( "frame: " + frame );
  43.             KillLinks( frame.document );
  44.         }
  45.     }
  46. }
  47.  
  48. function show(o)
  49. {
  50.     Console.WriteLineColor( "object " + o.toString(), 255 );
  51.  
  52.     for( var key in o )
  53.         Console.WriteLine( key + " = " + o[key] );
  54.  
  55.     for( var i=0; i<o.length; i++ )
  56.         Console.WriteLine( i + " = " + o[i] );
  57. }
  58.